How-To Visual DataFlex (exorgchart)

100	How can I change the background color for parts of the text Procedure OnCreate Forward Send OnCreate Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode Get ComAdd of hoNodes "Child" Nothing Nothing Nothing Nothing to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComCaption of hoNode to "<bgcolor=FF0000>new</bgcolor> caption" Send Destroy to hoNode Send Destroy to hoNodes End_Procedure
99	How can I change the foreground color for parts of the text Procedure OnCreate Forward Send OnCreate Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode Get ComAdd of hoNodes "Child" Nothing Nothing Nothing Nothing to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComCaption of hoNode to "<fgcolor=FF0000>new</fgcolor> caption" Send Destroy to hoNode Send Destroy to hoNodes End_Procedure
98	How can I show the node as strikeout Procedure OnCreate Forward Send OnCreate Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode Get ComAdd of hoNodes "Child" Nothing Nothing Nothing Nothing to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComCaption of hoNode to "<s>new</s> caption" Send Destroy to hoNode Send Destroy to hoNodes End_Procedure
97	How can I show the node as underlined Procedure OnCreate Forward Send OnCreate Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode Get ComAdd of hoNodes "Child" Nothing Nothing Nothing Nothing to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComCaption of hoNode to "<u>new</u> caption" Send Destroy to hoNode Send Destroy to hoNodes End_Procedure
96	How can I show the node as italic Procedure OnCreate Forward Send OnCreate Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode Get ComAdd of hoNodes "Child" Nothing Nothing Nothing Nothing to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComCaption of hoNode to "<i>new</i> caption" Send Destroy to hoNode Send Destroy to hoNodes End_Procedure
95	How can I bold the node Procedure OnCreate Forward Send OnCreate Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode Get ComAdd of hoNodes "Child" Nothing Nothing Nothing Nothing to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComCaption of hoNode to "<b>new</b> caption" Send Destroy to hoNode Send Destroy to hoNodes End_Procedure
94	How can I change the node's caption Procedure OnCreate Forward Send OnCreate Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode Get ComAdd of hoNodes "Child" Nothing Nothing Nothing Nothing to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComCaption of hoNode to "new caption" Send Destroy to hoNode Send Destroy to hoNodes End_Procedure
93	How can I display hierarchical the child nodes so they are indented relative to their parents Procedure OnCreate Forward Send OnCreate Set ComHasButtons to OLEexPlus Set ComPenLink to OLEexPenSolid Set ComPenWidthLink to 3 Set ComIndentSiblingX to 12 Set ComIndentSiblingY to 12 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode1 Get ComAdd of hoNodes "As <b>Tree</b>" "1234" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComArrangeSiblingNodesAs of hoNode1 to OLEexTree Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" "456" Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 1" "456" Nothing Nothing Nothing to Nothing Variant voNode2 Get ComAdd of hoNodes "Item 2" "456" "78" Nothing Nothing to voNode2 Handle hoNode2 Get Create (RefClass(cComNode)) to hoNode2 Set pvComObject of hoNode2 to voNode2 Set ComExpanded of hoNode2 to False Send Destroy to hoNode2 Get ComAdd of hoNodes "Item 2.1" "78" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 2.2" "78" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 3" "456" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "As <b>Default</b>" "AA" Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 1" "AA" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 2" "AA" "BB" Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 2.1" "BB" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 2.2" "BB" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 2.3" "BB" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 3" "AA" Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
92	How can I display the child nodes as a tree, so they are indented relative to their parents Procedure OnCreate Forward Send OnCreate Set ComIndentSiblingY to 4 Set ComHasButtons to OLEexPlus Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Set ComArrangeSiblingNodesAs of hoNode to OLEexTree Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child 1" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" "456" Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 1" "456" Nothing Nothing Nothing to Nothing Variant voNode1 Get ComAdd of hoNodes "Item 2" "456" "78" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComExpanded of hoNode1 to False Send Destroy to hoNode1 Get ComAdd of hoNodes "Item 2.1" "78" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 2.2" "78" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 3" "456" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child 2" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
91	How can I indent the child nodes relative to their parents Procedure OnCreate Forward Send OnCreate Set ComIndentChild to 32 Set ComHasButtons to OLEexPlus Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode1 Get ComAdd of hoNodes "AsTree" "1234" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComArrangeSiblingNodesAs of hoNode1 to OLEexTree Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" "456" Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 1" "456" Nothing Nothing Nothing to Nothing Variant voNode2 Get ComAdd of hoNodes "Item 2" "456" "78" Nothing Nothing to voNode2 Handle hoNode2 Get Create (RefClass(cComNode)) to hoNode2 Set pvComObject of hoNode2 to voNode2 Set ComExpanded of hoNode2 to False Send Destroy to hoNode2 Get ComAdd of hoNodes "Item 2.1" "78" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 2.2" "78" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Item 3" "456" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child 2" "AA" Nothing Nothing to Nothing Get ComAdd of hoNodes 1 "AA" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes 2 "AA" "BB" Nothing Nothing to Nothing Get ComAdd of hoNodes "2.1" "BB" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "2.2" "BB" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes 3 "AA" Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
90	How can I increase the distance between nodes Procedure OnCreate Forward Send OnCreate Set ComIndentSiblingY to 64 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "<a1>Link 1</a>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub <a1>Link 1</a>" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "<a2>Link 2</a>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
89	How can I increase the distance between nodes Procedure OnCreate Forward Send OnCreate Set ComIndentSiblingX to 64 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "<a1>Link 1</a>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub <a1>Link 1</a>" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "<a2>Link 2</a>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
88	How can I add an anchor or a hyperlink Procedure OnCreate Forward Send OnCreate Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "<a1>Link 1</a>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub <a1>Link 1</a>" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "<a2>Link 2</a>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
87	Can I change the visual effect, appearance for the anchor, hyperlink elements, in HTML captions, after the user clicks it Procedure OnCreate Forward Send OnCreate Set ComFormatAnchor False to "<u><fgcolor=880000> </fgcolor></u>" Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "<a1>Link 1</a>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub <a1>Link 1</a>" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "<a2>Link 2</a>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
86	Can I change the visual effect, appearance for the anchor, hyperlink elements, in HTML captions Procedure OnCreate Forward Send OnCreate Set ComFormatAnchor True to "<u><fgcolor=FF0000> </fgcolor></u>" Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "<a1>Link 1</a>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub <a1>Link 1</a>" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "<a2>Link 2</a>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
83	How can I assign multiple icons to a node Procedure OnCreate Forward Send OnCreate Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=" Set ComHTMLPicture "pic1" to "c:\exontrol\images\zipdisk.gif" Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to Nothing Variant voNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComCaption of hoNode1 to "<img>1</img> text <img>2</img> and so on<br>bla <b>bla</b> left<r><img>3</img>" Send Destroy to hoNode1 Variant voNode2 Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to voNode2 Handle hoNode2 Get Create (RefClass(cComNode)) to hoNode2 Set pvComObject of hoNode2 to voNode2 Set ComCaption of hoNode2 to "<img>pic1</img> text <img>1:6</img><img>1:6</img><img>1</img> <img>2</img>" Set ComFixedWidth of hoNode2 to 124 Set ComFixedHeight of hoNode2 to 48 Send Destroy to hoNode2 Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
82	How can I assign multiple pictures to a node Procedure OnCreate Forward Send OnCreate Set ComHTMLPicture "pic1" to "c:\exontrol\images\zipdisk.gif" Set ComHTMLPicture "pic2" to "c:\exontrol\images\auction.gif" Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to Nothing Variant voNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComCaption of hoNode1 to "<img>pic1</img> text <img>pic2</img>" Set ComFixedWidth of hoNode1 to 108 Set ComFixedHeight of hoNode1 to 48 Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
81	How can I change the color of the line that links assistant nodes Procedure OnCreate Forward Send OnCreate Set ComLinkAssistantColor to (RGB(255,0,0)) Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
80	How can I change the width of the line that links assistant nodes Procedure OnCreate Forward Send OnCreate Set ComPenLinkAssistant to OLEexPenSolid Set ComPenWidthLinkAssistant to 4 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
79	How can I change the style of the line that links assistant nodes Procedure OnCreate Forward Send OnCreate Set ComPenLinkAssistant to OLEexPenDashDotDot Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
78	How can I change the shape of the cursor when it hovers the +/- or expand/collapse buttons Procedure OnCreate Forward Send OnCreate Set ComCursor OLEexExpandButtonArea to "exHelp" Set ComHasButtons to OLEexPlus Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode1 Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComExpanded of hoNode1 to False Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
77	How do I change the shape of the cursor when the user clicks an drags the chart Procedure OnCreate Forward Send OnCreate Set ComCursor OLEexDragChart to "exHelp" Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode1 Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComExpanded of hoNode1 to False Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
76	How do I change the shape of the cursor when it hovers a node Procedure OnCreate Forward Send OnCreate Set ComCursor OLEexNodeArea to "exHelp" Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode1 Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComExpanded of hoNode1 to False Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
75	How do I change the shape of the cursor when it hovers the chart Procedure OnCreate Forward Send OnCreate Set ComCursor OLEexChartArea to "exHelp" Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode1 Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComExpanded of hoNode1 to False Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
74	How can I copy and paste the control's content to Microsoft Word for instance Procedure OnCreate Forward Send OnCreate Set ComHasButtons to OLEexPlus Set ComPenLink to OLEexPenSolid Set ComPenWidthLink to 3 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode1 Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComExpanded of hoNode1 to False Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
73	How can I copy and paste the control's content to Microsoft Word for instance Procedure OnCreate Forward Send OnCreate Set ComHasButtons to OLEexPlus Set ComButtonsAlign to OLEMiddleRight Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode1 Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComExpanded of hoNode1 to False Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
72	How can I enable or disable expanding or collapsing a node when user double clicks it Procedure OnCreate Forward Send OnCreate Set ComExpandOnDblClk to False Set ComHasButtons to OLEexPlus Set ComButtonsAlign to OLEMiddleRight Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode1 Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComExpanded of hoNode1 to False Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
71	How can I align the +/- expand or collapse buttons to the right Procedure OnCreate Forward Send OnCreate Set ComHasButtons to OLEexPlus Set ComButtonsAlign to OLEMiddleRight Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode1 Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComExpanded of hoNode1 to False Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
70	Can I display the +/- expand or collapse buttons using your EBN files Procedure OnCreate Forward Send OnCreate Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 11 "c:\exontrol\images\normal.ebn" to Nothing Get ComAdd of hoAppearance 22 "c:\exontrol\images\pushed.ebn" to Nothing Get ComAdd of hoAppearance 1 "CP:11 2 2 -2 -2" to Nothing Get ComAdd of hoAppearance 2 "CP:22 2 2 -2 -2" to Nothing Send Destroy to hoAppearance Set ComHasButtons to OLEexCustom Set ComHasButtonsCustom True to 33554432 Set ComHasButtonsCustom False to 16777216 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode1 Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComExpanded of hoNode1 to False Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
69	How can I change the +/- expand or collapse buttons Procedure OnCreate Forward Send OnCreate Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=" Set ComHasButtons to OLEexCustom Set ComHasButtonsCustom True to 1 Set ComHasButtonsCustom False to 2 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode1 Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComExpanded of hoNode1 to False Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
68	How can I change the +/- expand or collapse buttons Procedure OnCreate Forward Send OnCreate Set ComHasButtons to OLEexCircle Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode1 Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComExpanded of hoNode1 to False Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
67	How can I display +/- expand or collapse buttons Procedure OnCreate Forward Send OnCreate Set ComHasButtons to OLEexPlus Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Variant voNode1 Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to voNode1 Handle hoNode1 Get Create (RefClass(cComNode)) to hoNode1 Set pvComObject of hoNode1 to voNode1 Set ComExpanded of hoNode1 to False Send Destroy to hoNode1 Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
66	How do I show or hide the assistant nodes Procedure OnCreate Forward Send OnCreate Set ComShowAssistants to True Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Get ComAddAssistant of hoNode "Assistant 1" Nothing Nothing to Nothing Get ComAddAssistant of hoNode "Assistant 2" Nothing Nothing to Nothing Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
65	How do I scale or zoom the chart Procedure OnCreate Forward Send OnCreate Set ComBorderWidth to 18 Set ComBorderHeight to 18 Set ComZoomWidthMode to OLEexCustomSize Set ComZoomHeightMode to OLEexCustomSize Set ComZoomWidth to 2 Set ComZoomHeight to 2 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
64	How do I scale or zoom the chart Procedure OnCreate Forward Send OnCreate Set ComBorderWidth to 18 Set ComBorderHeight to 18 Set ComZoomWidthMode to OLEexControlSize Set ComZoomHeightMode to OLEexControlSize Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
63	How can I ensure that the selected node is visible or fits the chart's area Procedure OnCreate Forward Send OnCreate Set ComEnsureVisibleOnSelect to True Set ComScrollOnEnsure to False Set ComBorderWidth to 18 Set ComBorderHeight to 18 Set ComZoomWidthMode to OLEexCustomSize Set ComZoomHeightMode to OLEexCustomSize Set ComZoomWidth to 2 Set ComZoomHeight to 2 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 3" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
62	How do I avoid slow moving the chart when the user selects a new node Procedure OnCreate Forward Send OnCreate Set ComScrollByClick to False End_Procedure
61	How do I ensure that a node is visible or fits the chart's area Procedure OnCreate Forward Send OnCreate Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes Send ComEnsureVisibleNode "1234" End_Procedure
60	How do I change the root node, so it explore from a specified node Procedure OnCreate Forward Send OnCreate Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 1" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Sub 2" "1234" Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes Set ComExploreFromNode to "1234" End_Procedure
59	How do I select a node Procedure OnCreate Forward Send OnCreate Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" "1234" Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes Set ComSelectNode to "1234" Set ComHideSelection to False End_Procedure
57	How do I fix the height for all nodes Procedure OnCreate Forward Send OnCreate Set ComFixedHeightNode to 32 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" Nothing Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
56	How do I fix the width for all nodes Procedure OnCreate Forward Send OnCreate Set ComFixedWidthNode to 128 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComImage of hoNode to 0 Send Destroy to hoNode Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" Nothing Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
55	How do I change the style of the link between nodes Procedure OnCreate Forward Send OnCreate Set ComPenLink to OLEexPenDash Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" Nothing Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
54	How do I change the color to link the nodes Procedure OnCreate Forward Send OnCreate Set ComLinkColor to (RGB(255,0,0)) Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" Nothing Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
53	How do I change the shape for selected node, using your EBN files Procedure OnCreate Forward Send OnCreate Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 2 "c:\exontrol\images\pushed.ebn" to Nothing Send Destroy to hoAppearance Set ComSelColor to \|CI$2000000 Set ComSelectNode to "root" Set ComHideSelection to False Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" Nothing Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
52	How do I change the color for selected node Procedure OnCreate Forward Send OnCreate Set ComSelColor to (RGB(0,0,255)) Set ComSelectNode to "root" Set ComHideSelection to False Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" Nothing Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
51	How do I hide the node's shadow Procedure OnCreate Forward Send OnCreate Set ComShadowNode to False End_Procedure
50	How do I change the pen to draw the border for all nodes Procedure OnCreate Forward Send OnCreate Set ComPenBorderNode to OLEexPenDot End_Procedure
49	How do I change the shape of the border for all nodes Procedure OnCreate Forward Send OnCreate Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 2 "c:\exontrol\images\pushed.ebn" to Nothing Send Destroy to hoAppearance Set ComBackground OLEexNodeFrame to \|CI$2000000 End_Procedure
48	How do I change the shape of the border for all nodes Procedure OnCreate Forward Send OnCreate Set ComDrawRoundNode to False End_Procedure
47	How do I change the foreground color for all nodes Procedure OnCreate Forward Send OnCreate Set ComForeColorNode to (RGB(255,0,0)) Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" Nothing Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
46	How do I change the background color for all nodes Procedure OnCreate Forward Send OnCreate Set ComBackColorNode to (RGB(255,0,0)) Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" Nothing Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
45	How do I change the key of the root Procedure OnCreate Forward Send OnCreate Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComKey of hoNode to "myKey" Send Destroy to hoNode End_Procedure
44	How do I change the caption of the root Procedure OnCreate Forward Send OnCreate Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComCaption of hoNode to "new<br>root" Send Destroy to hoNode End_Procedure
43	How do I access the root node Procedure OnCreate Forward Send OnCreate Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComCaption of hoNode to "new<br>root" Send Destroy to hoNode End_Procedure
42	How do I access the nodes collection Procedure OnCreate Forward Send OnCreate Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" Nothing Nothing Nothing Nothing to Nothing Get ComAdd of hoNodes "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes End_Procedure
41	How do I refresh the control Procedure OnCreate Forward Send OnCreate Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes Variant voNodes1 Get ComNodes to voNodes1 Handle hoNodes1 Get Create (RefClass(cComNodes)) to hoNodes1 Set pvComObject of hoNodes1 to voNodes1 Get ComAdd of hoNodes1 "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes1 Send ComRefresh End_Procedure
40	How do I prevent painting while several changes are performed Procedure OnCreate Forward Send OnCreate Send ComBeginUpdate Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes Variant voNodes1 Get ComNodes to voNodes1 Handle hoNodes1 Get Create (RefClass(cComNodes)) to hoNodes1 Set pvComObject of hoNodes1 to voNodes1 Get ComAdd of hoNodes1 "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes1 Send ComEndUpdate End_Procedure
39	How do I indent the full chart to the right Procedure OnCreate Forward Send OnCreate Set ComBorderWidth to 8 Set ComBorderHeight to 8 End_Procedure
38	How can I change the node's border/frame, using your EBN files Procedure OnCreate Forward Send OnCreate Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing Send Destroy to hoAppearance Set ComBackground OLEexNodeFrame to \|CI$1000000 Variant voNodes Get ComNodes to voNodes Handle hoNodes Get Create (RefClass(cComNodes)) to hoNodes Set pvComObject of hoNodes to voNodes Get ComAdd of hoNodes "Child <b>1</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes Variant voNodes1 Get ComNodes to voNodes1 Handle hoNodes1 Get Create (RefClass(cComNodes)) to hoNodes1 Set pvComObject of hoNodes1 to voNodes1 Get ComAdd of hoNodes1 "Child <b>2</b>" Nothing Nothing Nothing Nothing to Nothing Send Destroy to hoNodes1 End_Procedure
37	How can still display the selected node when the control loses the focus Procedure OnCreate Forward Send OnCreate Set ComHideSelection to False End_Procedure
36	How do I disable or enable the control Procedure OnCreate Forward Send OnCreate Set ComEnabled to False End_Procedure
35	How do I change the visual aspect for thumb parts in the scroll bars, using EBN Procedure OnCreate Forward Send OnCreate Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing Send Destroy to hoAppearance Variant voAppearance1 Get ComVisualAppearance to voAppearance1 Handle hoAppearance1 Get Create (RefClass(cComAppearance)) to hoAppearance1 Set pvComObject of hoAppearance1 to voAppearance1 Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing Send Destroy to hoAppearance1 Variant voAppearance2 Get ComVisualAppearance to voAppearance2 Handle hoAppearance2 Get Create (RefClass(cComAppearance)) to hoAppearance2 Set pvComObject of hoAppearance2 to voAppearance2 Get ComAdd of hoAppearance2 3 "c:\exontrol\images\hot.ebn" to Nothing Send Destroy to hoAppearance2 Set ComBackground OLEexHSThumb to \|CI$1000000 Set ComBackground OLEexHSThumbP to \|CI$2000000 Set ComBackground OLEexHSThumbH to \|CI$3000000 Set ComBackground OLEexVSThumb to \|CI$1000000 Set ComBackground OLEexVSThumbP to \|CI$2000000 Set ComBackground OLEexVSThumbH to \|CI$3000000 Set ComFixedWidthNode to 320 End_Procedure
34	How do I change the visual aspect only for the thumb in the scroll bar, using EBN Procedure OnCreate Forward Send OnCreate Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing Send Destroy to hoAppearance Variant voAppearance1 Get ComVisualAppearance to voAppearance1 Handle hoAppearance1 Get Create (RefClass(cComAppearance)) to hoAppearance1 Set pvComObject of hoAppearance1 to voAppearance1 Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing Send Destroy to hoAppearance1 Variant voAppearance2 Get ComVisualAppearance to voAppearance2 Handle hoAppearance2 Get Create (RefClass(cComAppearance)) to hoAppearance2 Set pvComObject of hoAppearance2 to voAppearance2 Get ComAdd of hoAppearance2 3 "c:\exontrol\images\hot.ebn" to Nothing Send Destroy to hoAppearance2 Set ComBackground OLEexHSThumb to \|CI$1000000 Set ComBackground OLEexHSThumbP to \|CI$2000000 Set ComBackground OLEexHSThumbH to \|CI$3000000 Set ComScrollThumbSize OLEexHScroll to 96 Set ComFixedWidthNode to 320 End_Procedure
33	I've seen that you can change the visual appearance for the scroll bar. How can I do that Procedure OnCreate Forward Send OnCreate Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing Send Destroy to hoAppearance Variant voAppearance1 Get ComVisualAppearance to voAppearance1 Handle hoAppearance1 Get Create (RefClass(cComAppearance)) to hoAppearance1 Set pvComObject of hoAppearance1 to voAppearance1 Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing Send Destroy to hoAppearance1 Variant voAppearance2 Get ComVisualAppearance to voAppearance2 Handle hoAppearance2 Get Create (RefClass(cComAppearance)) to hoAppearance2 Set pvComObject of hoAppearance2 to voAppearance2 Get ComAdd of hoAppearance2 3 "c:\exontrol\images\hot.ebn" to Nothing Send Destroy to hoAppearance2 Set ComBackground OLEexSBtn to \|CI$1000000 Set ComBackground OLEexSBtnP to \|CI$2000000 Set ComBackground OLEexSBtnH to \|CI$3000000 Set ComBackground OLEexHSBack to (RGB(240,240,240)) Set ComBackground OLEexVSBack to (RGB(240,240,240)) Set ComBackground OLEexSizeGrip to (RGB(240,240,240)) Set ComFixedWidthNode to 320 End_Procedure
32	Can I change the forecolor for the tooltip Procedure OnCreate Forward Send OnCreate Set ComToolTipDelay to 1 Set ComToolTipWidth to 364 Set ComBackground OLEexToolTipForeColor to (RGB(255,0,0)) Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComToolTip of hoNode to "This is a bit of text that's shown when the cursor hovers the node." Send Destroy to hoNode End_Procedure
31	Can I change the background color for the tooltip Procedure OnCreate Forward Send OnCreate Set ComToolTipDelay to 1 Set ComToolTipWidth to 364 Set ComBackground OLEexToolTipBackColor to (RGB(255,0,0)) Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComToolTip of hoNode to "This is a bit of text that's shown when the cursor hovers the node." Send Destroy to hoNode End_Procedure
30	Can I change the default border of the tooltip, using your EBN files Procedure OnCreate Forward Send OnCreate Set ComToolTipDelay to 1 Set ComToolTipWidth to 364 Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing Send Destroy to hoAppearance Set ComBackground OLEexToolTipAppearance to \|CI$1000000 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComToolTip of hoNode to "This is a bit of text that's shown when the cursor hovers the node." Send Destroy to hoNode End_Procedure
29	How do I call your x-script language Procedure OnCreate Forward Send OnCreate Get ComExecuteTemplate "BackColor = RGB(255,0,0)" to Nothing End_Procedure
28	How do I call your x-script language Procedure OnCreate Forward Send OnCreate Set ComTemplate to "BackColor = RGB(255,0,0)" End_Procedure
27	Can I change the font for the tooltip Procedure OnCreate Forward Send OnCreate Set ComToolTipDelay to 1 Variant voStdFont Get ComToolTipFont to voStdFont Handle hoStdFont Get Create (RefClass(cComStdFont)) to hoStdFont Set pvComObject of hoStdFont to voStdFont Set ComName of hoStdFont to "Tahoma" Set ComSize of hoStdFont to 14 Send Destroy to hoStdFont Set ComToolTipWidth to 364 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComToolTip of hoNode to "This is a bit of text that's shown when the cursor hovers the node." Send Destroy to hoNode End_Procedure
26	I've seen that the width of the tooltip is variable. Can I make it larger Procedure OnCreate Forward Send OnCreate Set ComToolTipWidth to 328 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComToolTip of hoNode to "This is a bit of text that's shown when the cursor hovers the node." Send Destroy to hoNode End_Procedure
25	How do I let the tooltip being displayed longer Procedure OnCreate Forward Send OnCreate Set ComToolTipPopDelay to 10000 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComToolTip of hoNode to "This is a bit of text that's shown when the cursor hovers the node." Send Destroy to hoNode End_Procedure
24	How do I disable showing the tooltip for all control Procedure OnCreate Forward Send OnCreate Set ComToolTipDelay to 0 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComToolTip of hoNode to "This is a bit of text that's shown when the cursor hovers the node." Send Destroy to hoNode End_Procedure
23	How do I show the tooltip quicker Procedure OnCreate Forward Send OnCreate Set ComToolTipDelay to 1 Variant voNode Get ComRoot to voNode Handle hoNode Get Create (RefClass(cComNode)) to hoNode Set pvComObject of hoNode to voNode Set ComToolTip of hoNode to "This is a bit of text that's shown when the cursor hovers the node." Send Destroy to hoNode End_Procedure
22	Can I change the order of the buttons in the scroll bar Procedure OnCreate Forward Send OnCreate Set ComScrollOrderParts OLEexHScroll to "t,l,r" Set ComScrollOrderParts OLEexVScroll to "t,l,r" Set ComFixedWidthNode to 320 End_Procedure
21	The thumb size seems to be very small. Can I make it bigger Procedure OnCreate Forward Send OnCreate Set ComScrollThumbSize OLEexHScroll to 164 Set ComFixedWidthNode to 320 End_Procedure
20	How do I enlarge or change the size of the control's scrollbars Procedure OnCreate Forward Send OnCreate Set ComScrollHeight to 18 Set ComScrollWidth to 18 Set ComScrollButtonWidth to 18 Set ComScrollButtonHeight to 18 Set ComFixedWidthNode to 320 Set ComFixedHeightNode to 320 End_Procedure
19	How can I display my text on the scroll bar, using a different font Procedure OnCreate Forward Send OnCreate Set ComScrollPartCaption OLEexHScroll OLEexThumbPart to "This is just a text" Variant voStdFont Get ComScrollFont OLEexHScroll to voStdFont Handle hoStdFont Get Create (RefClass(cComStdFont)) to hoStdFont Set pvComObject of hoStdFont to voStdFont Set ComSize of hoStdFont to 12 Send Destroy to hoStdFont Set ComScrollThumbSize OLEexHScroll to 128 Set ComScrollHeight to 24 Set ComScrollPartCaption OLEexHScroll OLEexThumbPart to "This is <s><font Tahoma;12> just </font></s> text" Set ComScrollHeight to 20 Set ComFixedWidthNode to 320 End_Procedure
18	How can I display my text on the scroll bar Procedure OnCreate Forward Send OnCreate Set ComScrollPartCaption OLEexHScroll OLEexThumbPart to "this is just a text" Set ComScrollThumbSize OLEexHScroll to 96 Set ComFixedWidthNode to 320 End_Procedure
17	How do I assign a tooltip to a scrollbar Procedure OnCreate Forward Send OnCreate Set ComScrollToolTip OLEexHScroll to "This is a tooltip being shown when you click and drag the thumb in the horizontal scroll bar" Set ComFixedWidthNode to 320 End_Procedure
16	How do I assign an icon to the button in the scrollbar Procedure OnCreate Forward Send OnCreate Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=" Set ComScrollPartVisible OLEexHScroll OLEexLeftB1Part to True Set ComScrollPartCaption OLEexHScroll OLEexLeftB1Part to "<img>1</img>" Set ComScrollHeight to 18 Set ComScrollButtonWidth to 18 Set ComFixedWidthNode to 320 End_Procedure
15	I need to add a button in the scroll bar. Is this possible Procedure OnCreate Forward Send OnCreate Set ComScrollPartVisible OLEexHScroll OLEexLeftB1Part to True Set ComScrollPartCaption OLEexHScroll OLEexLeftB1Part to "1" Set ComFixedWidthNode to 320 End_Procedure
14	Can I display an additional buttons in the scroll bar Procedure OnCreate Forward Send OnCreate Set ComScrollPartVisible OLEexHScroll OLEexLeftB1Part to True Set ComScrollPartVisible OLEexHScroll OLEexLeftB2Part to True Set ComScrollPartVisible OLEexHScroll OLEexRightB6Part to True Set ComScrollPartVisible OLEexHScroll OLEexRightB5Part to True Set ComFixedWidthNode to 320 End_Procedure
13	How do I change the control's foreground color Procedure OnCreate Forward Send OnCreate Set ComForeColor to (RGB(255,0,0)) End_Procedure
12	How do I change the control's background color Procedure OnCreate Forward Send OnCreate Set ComBackColor to (RGB(200,200,200)) End_Procedure
11	How can I change the control's font Procedure OnCreate Forward Send OnCreate Variant voStdFont Get ComFont to voStdFont Handle hoStdFont Get Create (RefClass(cComStdFont)) to hoStdFont Set pvComObject of hoStdFont to voStdFont Set ComName of hoStdFont to "Verdana" Send Destroy to hoStdFont Send ComRefresh End_Procedure
10	How do I put a picture on the center of the control Procedure OnCreate Forward Send OnCreate Variant vPicture Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture Set ComPicture to (vPicture) Set ComPictureDisplay to OLEMiddleCenter End_Procedure
9	How do I resize/stretch a picture on the control's background Procedure OnCreate Forward Send OnCreate Variant vPicture Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture Set ComPicture to (vPicture) Set ComPictureDisplay to OLEStretch End_Procedure
8	How do I put a picture on the control's center right bottom side Procedure OnCreate Forward Send OnCreate Variant vPicture Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture Set ComPicture to (vPicture) Set ComPictureDisplay to OLELowerRight End_Procedure
7	How do I put a picture on the control's center left bottom side Procedure OnCreate Forward Send OnCreate Variant vPicture Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture Set ComPicture to (vPicture) Set ComPictureDisplay to OLELowerLeft End_Procedure
6	How do I put a picture on the control's center top side Procedure OnCreate Forward Send OnCreate Variant vPicture Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture Set ComPicture to (vPicture) Set ComPictureDisplay to OLEUpperCenter End_Procedure
5	How do I put a picture on the control's right top corner Procedure OnCreate Forward Send OnCreate Variant vPicture Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture Set ComPicture to (vPicture) Set ComPictureDisplay to OLEUpperRight End_Procedure
4	How do I put a picture on the control's left top corner Procedure OnCreate Forward Send OnCreate Variant vPicture Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture Set ComPicture to (vPicture) Set ComPictureDisplay to OLEUpperLeft End_Procedure
3	How do I put a picture on the control's background Procedure OnCreate Forward Send OnCreate Variant vPicture Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture Set ComPicture to (vPicture) End_Procedure
2	How do I change the control's border, using your EBN files Procedure OnCreate Forward Send OnCreate Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing Send Destroy to hoAppearance Set ComAppearance to \|CI$1000000 End_Procedure
1	How do I remove the control's border Procedure OnCreate Forward Send OnCreate Set ComAppearance to OLENone2 End_Procedure